#!/usr/bin/perl
use lib '/var/www';
use configuration;

use CGI;
use CGI::Carp qw(fatalsToBrowser);
use CCNQ::Billing::Info;

sub run()
{
    print CGI::header(-type=>'text/plain');

    my $info = new CCNQ::Billing::Info;
    print $info->billto_as_text();
}

run();
